home *** CD-ROM | disk | FTP | other *** search
/ HaCKeRz Kr0nlcKLeZ 1 / HaCKeRz Kr0nlcKLeZ.iso / scriptz / glitch.exe / INI / alias.ini next >
Encoding:
INI File  |  1997-04-07  |  16.2 KB  |  372 lines
  1. [aliases]
  2. n0=/op /mode # +oooo $1 $2 $3 $4
  3. n1=/dop /mode # -oooo $1 $2 $3 $4
  4. n2=/j /join #$$1
  5. n3=/p /part #
  6. n4=/w /whois $$1
  7. n5=/wwas /whowas $$1
  8. n6=/k /kick # $*
  9. n7=/ping /ctcp $$1 ping
  10. n8=/pg /ctcp $me ping
  11. n9=/voice /mode # +v $$1
  12. n10=/version /ctcp $$1 version
  13. n11=/www /run %www
  14. n12=/ftp /run %ftp
  15. n13=/filemanager /run %filemanager
  16. n14=/email /run %email
  17. n15=/html /run %html
  18. n16=/ftpserver /run %ftpserver
  19. n17=/ircserver /run %ircserver
  20. n18=/textedit /run %textedit
  21. n19=/mkb {
  22. n20=  set %a 1
  23. n21=  :begin
  24. n22=  if (%mass.vars == all) { set %mass $nick(%a,#) | goto start }
  25. n23=  if (%mass.vars == noop) { set %mass $nopnick(%a,#) | goto start }
  26. n24=  if (%mass.vars == op) { set %mass $opnick(%a,#) | goto start }
  27. n25=  :start
  28. n26=  if (%mass == $null) { goto end }
  29. n27=  if (%mass != $me) { ban # %mass 3 | kick # %mass Mass Kick/Ban %glitch }
  30. n28=  inc %a 1
  31. n29=  goto begin
  32. n30=  :end
  33. n31=  unset %mass.vars
  34. n32=}
  35. n33=/addkick {
  36. n34=  set %addkick $address($$1,#)
  37. n35=  set %b 1
  38. n36=  :begin
  39. n37=  set %nick $nick(%b,#)
  40. n38=  set %addkick2 $address(%nick,#)
  41. n39=  if (%nick == $me) { inc %b 1 | goto begin }
  42. n40=  if (%nick == $null) { goto end }
  43. n41=  if ($mask(%addkick2,2) == $mask(%addkick,2) ) { kick # %nick %glitch }
  44. n42=  inc %b 1
  45. n43=  goto begin
  46. n44=  :end
  47. n45=  unset %b %nick
  48. n46=}
  49. n47=/minvite {
  50. n48=  set %c 1
  51. n49=  :begin
  52. n50=  set %mass $nopnick(%c,#)
  53. n51=  if (%mass == $null) { echo 4 # ½(GLiTCH)╗ Completed Mass Invite on # $+ ! | halt }
  54. n52=  if (%mass != $me) { .timer 1 %c .invite %mass $$1 }
  55. n53=  inc %c 1
  56. n54=  goto begin
  57. n55=}
  58. n56=/addl2 {
  59. n57=  set %readini $readini $mircdir $+ \botfiles\userlist.bot noop $address($$2,3)
  60. n58=  if ($$1 == all) {
  61. n59=  writeini $mircdir $+ botfiles\userlist.bot noop $address($$2,3) all | goto end }
  62. n60=  if ($$1 == current) { if (%readini == all) { goto continue } }
  63. n61=  if ($chr(35) isin %readini) { set %readini %readini #
  64. n62=  writeini $mircdir $+ botfiles\userlist.bot noop $address($$2,3) %readini | goto end }
  65. n63=  :continue
  66. n64=  writeini $mircdir $+ botfiles\userlist.bot noop $address($$2,3) #
  67. n65=  :end
  68. n66=  unset %readini
  69. n67=}
  70. n68=/reml2 {
  71. n69=  set %level2 $readini $mircdir $+ botfiles\userlist.bot noop $address($$2,3)
  72. n70=  if ($$1 == all) { remini $mircdir $+ botfiles\userlist.bot noop $address($$2,3) | goto end }
  73. n71=  if ($$1 == current) { if (%level2 == all) { remini $mircdir $+ botfiles\userlist.bot noop $address($$2,3) | goto end } }
  74. n72=  else { set %level2 $remove(%level2,#)
  75. n73=    if (%level2 == $null) { remini $mircdir $+ botfiles\userlist.bot noop $address($$2,3) | goto end }
  76. n74=  else { writeini $mircdir $+ botfiles\userlist.bot noop $address($$2,3) %level2 | goto end } }
  77. n75=  :end
  78. n76=  unset %level2
  79. n77=}
  80. n78=/addl3 {
  81. n79=  set %readini $readini $mircdir $+ botfiles\userlist.bot autovoice $address($$2,3)
  82. n80=  if ($$1 == all) {
  83. n81=  writeini $mircdir $+ botfiles\userlist.bot autovoice $address($$2,3) all | goto end }
  84. n82=  if ($$1 == current) { if (%readini == all) { goto continue } }
  85. n83=  if ($chr(35) isin %readini) { set %readini %readini #
  86. n84=  writeini $mircdir $+ botfiles\userlist.bot autovoice $address($$2,3) %readini | goto end }
  87. n85=  :continue
  88. n86=  writeini $mircdir $+ botfiles\userlist.bot autovoice $address($$2,3) #
  89. n87=  :end
  90. n88=  unset %readini
  91. n89=}
  92. n90=/reml3 {
  93. n91=  set %level3 $readini $mircdir $+ botfiles\userlist.bot autovoice $address($$2,3)
  94. n92=  if ($$1 == all) { remini $mircdir $+ botfiles\userlist.bot autovoice $address($$2,3) | goto end }
  95. n93=  if ($$1 == current) { if (%level3 == all) { remini $mircdir $+ botfiles\userlist.bot autovoice $address($$2,3) | goto end } }
  96. n94=  else { set %level3 $remove(%level3,#)
  97. n95=    if (%level3 == $null) { remini $mircdir $+ botfiles\userlist.bot autovoice $address($$2,3) | goto end }
  98. n96=  else { writeini $mircdir $+ botfiles\userlist.bot autovoice $address($$2,3) %level3 | goto end } }
  99. n97=  :end
  100. n98=  unset %level3
  101. n99=}
  102. n100=/addl4 {
  103. n101=  set %readini $readini $mircdir $+ botfiles\userlist.bot autoop $address($$2,3)
  104. n102=  if ($$1 == all) {
  105. n103=  writeini $mircdir $+ botfiles\userlist.bot autoop $address($$2,3) all | goto end }
  106. n104=  if ($$1 == current) { if (%readini == all) { goto continue } }
  107. n105=  if ($chr(35) isin %readini) { set %readini %readini #
  108. n106=  writeini $mircdir $+ botfiles\userlist.bot autoop $address($$2,3) %readini | goto end }
  109. n107=  :continue
  110. n108=  writeini $mircdir $+ botfiles\userlist.bot autoop $address($$2,3) #
  111. n109=  :end
  112. n110=  unset %readini
  113. n111=}
  114. n112=/reml4 {
  115. n113=  set %level4 $readini $mircdir $+ botfiles\userlist.bot autoop $address($$2,3)
  116. n114=  if ($$1 == all) { remini $mircdir $+ botfiles\userlist.bot autoop $address($$2,3) | goto end }
  117. n115=  if ($$1 == current) { if (%level4 == all) { remini $mircdir $+ botfiles\userlist.bot autoop $address($$2,3) | goto end } }
  118. n116=  else { set %level4 $remove(%level4,#)
  119. n117=    if (%level4 == $null) { remini $mircdir $+ botfiles\userlist.bot autoop $address($$2,3) | goto end }
  120. n118=  else { writeini $mircdir $+ botfiles\userlist.bot autoop $address($$2,3) %level4 | goto end } }
  121. n119=  :end
  122. n120=  unset %level4
  123. n121=}
  124. n122=/reml5 {
  125. n123=  set %level5 $readini $mircdir $+ botfiles\userlist.bot autoop-protect $address($$2,3)
  126. n124=  if ($$1 == all) { remini $mircdir $+ botfiles\userlist.bot autoop-protect $address($$2,3) | goto end }
  127. n125=  if ($$1 == current) { if (%level5 == all) { remini $mircdir $+ botfiles\userlist.bot autoop-protect $address($$2,3) | goto end } }
  128. n126=  else { set %level5 $remove(%level5,#)
  129. n127=    if (%level5 == $null) { remini $mircdir $+ botfiles\userlist.bot autoop-protect $address($$2,3) | goto end }
  130. n128=  else { writeini $mircdir $+ botfiles\userlist.bot autoop-protect $address($$2,3) %level5 | goto end } }
  131. n129=  :end
  132. n130=  unset %level5
  133. n131=}
  134. n132=/addl5 {
  135. n133=  set %readini $readini $mircdir $+ botfiles\userlist.bot autoop-protect $address($$2,3)
  136. n134=  if ($$1 == all) {
  137. n135=  writeini $mircdir $+ botfiles\userlist.bot autoop-protect $address($$2,3) all | goto end }
  138. n136=  if ($$1 == current) { if (%readini == all) { goto continue } }
  139. n137=  if ($chr(35) isin %readini) { set %readini %readini #
  140. n138=  writeini $mircdir $+ botfiles\userlist.bot autoop-protect $address($$2,3) %readini | goto end }
  141. n139=  :continue
  142. n140=  writeini $mircdir $+ botfiles\userlist.bot autoop-protect $address($$2,3) #
  143. n141=  :end
  144. n142=  unset %readini
  145. n143=}
  146. n144=/s /dde millennium command "" /say *1
  147. n145=/trace.results {
  148. n146=  write -il4 $mircdir $+ botfiles\tracer.bot ---------------------------------------------------------------
  149. n147=  write -il $mircdir $+ botfiles\tracer.bot ---------------------------------------------------------------
  150. n148=  set %total.lines $lines(c:\glitch\botfiles\tracer.bot )
  151. n149=  set %tl 1
  152. n150=  :start
  153. n151=  write -dl1 $mircdir $+ botfiles\tracer.bot
  154. n152=  echo 6 @Trace_Results ½(GLiTCH)╗ $read -l1 c:\glitch\botfiles\tracer.bot
  155. n153=  if (%tl == %total.lines) { goto end }
  156. n154=  inc %tl 1
  157. n155=  goto start
  158. n156=  :end
  159. n157=  echo 4 @Trace_Results ½(GLiTCH)╗ Finished Trace
  160. n158=  unset %tl
  161. n159=  unset %total.lines
  162. n160=}
  163. n161=/f2 {
  164. n162=  /run c:\windows\notepad.exe $mircdir $+ txt\readme.txt
  165. n163=}
  166. n164=/f4 /nick $r(A,Z) $+ $r(a,z) $+ $r(1,10) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(1,9) $+ $r(A,Z)
  167. n165=/f5 {
  168. n166=  if (%flood == Enabled) {
  169. n167=    .disable #flood
  170. n168=    set %flood Disabled
  171. n169=  echo 4 ½(GLiTCH)╗ CTCP Flood Control Off }
  172. n170=  else { .enable #flood 
  173. n171=    set %flood Enabled 
  174. n172=  echo 4 ½(GLiTCH)╗ CTCP Flood Control On }
  175. n173=}
  176. n174=/f7 /clearall
  177. n175=/f6 {
  178. n176=  if (%messages.total == 0) { echo 4 ½(GLiTCH)╗ No messages detected. }
  179. n177=  else { .play -c $me $mircdir $+ botfiles\message.bot 20 }
  180. n178=}
  181. n179=/f8 {
  182. n180=  if (%ignoreduser == $null) {
  183. n181=  echo 4 ½(GLiTCH)╗ No nicks have been ignored... }
  184. n182=  else {
  185. n183=    ignore -r %ignoreduser
  186. n184=    /echo 4 ½(GLiTCH)╗  %ignoreduser has been un-ignored.
  187. n185=  /unset %ignoreduser }
  188. n186=}
  189. n187=/f11 {
  190. n188=  echo 4 ½(GLiTCH)╗ Running Millennium Bot 
  191. n189=  run $mircdir $+ mirc32.exe $mircdir $+ clones\mill.ini
  192. n190=}
  193. n191=/f12 {
  194. n192=  echo 4 ½(GLiTCH)╗ Killing Millennium Bot 
  195. n193=  dde millennium command "" /die
  196. n194=}
  197. n195=/f10 {
  198. n196=  if (%splitdetector == Enabled) {
  199. n197=    .disable #splitdetector
  200. n198=    window -c @Current_Split_Servers
  201. n199=    echo 4 ½(GLiTCH)╗ NetSplit Detector Disabled 
  202. n200=    set %splitdetector Disabled
  203. n201=  mode $me -s }
  204. n202=  else { .enable #splitdetector
  205. n203=    window -l @Current_Split_Servers 100 100 250 250 $mircdir $+ botfiles\splits.bot
  206. n204=    echo 4 ½(GLiTCH)╗ NetSplit Detector Enabled
  207. n205=    set %splitdetector Enabled
  208. n206=  mode $me +s }
  209. n207=}
  210. n208=/away.check .whois $me
  211. n209=/nick /nick $$1 | .titlebar Glitch Script v3.7 for mIRC5.0, ⌐1997 GLiTCH Studios -- ( $+ Nick : $$1 $+ ) ( $+ Day : $day $+ ) ( $+ Messages : %messages.total $+ )
  212. n210=/mail.snd {
  213. n211=  msg = $+ $me mail from: %mail.me
  214. n212=  msg = $+ $me rcpt to: %mail.send
  215. n213=  msg = $+ $me data
  216. n214=  msg = $+ $me subject: %mail.subject
  217. n215=  msg = $+ $me %mail.message
  218. n216=  msg = $+ $me .
  219. n217=}
  220. n218=/bwards {
  221. n219=  set %z 1
  222. n220=  :start
  223. n221=  set %bwards.length $len(%bwards.text)
  224. n222=  set %bwards.text *1
  225. n223=  set %bwards.product $mid(%z,1,%bwards.text) $+ %bwards.product
  226. n224=  if (%z == %bwards.length) { say %bwards.product | unset %bwards.* %z | halt }
  227. n225=  inc %z
  228. n226=  goto start
  229. n227=}
  230. n228=/piglatin {
  231. n229=  set %o 1
  232. n230=  set %latin.text *1
  233. n231=  Set %latin.count $token(0,544,%latin.text)
  234. n232=  :start
  235. n233=  if (%o == %latin.count ) { 
  236. n234=    set %latin.word $token(%latin.count,544,%latin.text)
  237. n235=    Set %latin.letter $left(1,%latin.word)
  238. n236=    set %r $len(%latin.word)
  239. n237=    dec %r
  240. n238=    set %latin.word1 $mid(2,%r,%latin.word) $+ %latin.letter $+ ay
  241. n239=    Set %latin.total %latin.total %latin.word1
  242. n240=    if (? isin %latin.text) { set %latin.total $remove(%latin.total,?) $+ ? }
  243. n241=    if (. isin %latin.text) { set %latin.total $remove(%latin.total,.) $+ . }
  244. n242=    if (! isin %latin.text) { set %latin.total $remove(%latin.total,!) $+ ! }
  245. n243=    say  %latin.total | unset %o
  246. n244=  goto end }
  247. n245=  else {
  248. n246=    set %latin.temp $token(%o,544,%latin.text)
  249. n247=    set %latin.letter $left(1,%latin.temp)
  250. n248=    set %r $len(%latin.temp)
  251. n249=    dec %r
  252. n250=    set %latin.total %latin.total $mid(2,%r,%latin.temp) $+ %latin.letter $+ ay
  253. n251=    inc %o
  254. n252=    goto start
  255. n253=  }
  256. n254=  :end
  257. n255=  unset %latin.*
  258. n256=}
  259. n257=/notes /echo 4 ½(GLiTCH)╗ Editing QuickNotes | /run c:\windows\notepad.exe $mircdir $+ botfiles\quiknote.bot
  260. n258=/sethome /set %homechan %homechan $+ , $+ $$1 | /echo 4 ½(GLiTCH)╗ Home Channel(s) set to %homechan $+ .
  261. n259=/glitch { 
  262. n260=  /echo 5 ááááááá________ááááááá_á______________áá__ 
  263. n261=  /echo 4 ááááá/á____áá/áá/áááááá(_)_áá__/á____/ááá/ááá/ááá/ 
  264. n262=  /echo 3 ááá/ /áá__ á/áá/áááááá/áá/á/á /á/á/áááááá/ááá/_á/ááá/ 
  265. n263=  /echo 2 á/á/_/á áá/áá/___/ á/á/áá/á/á/___/ááá__ááááá/   
  266. n264=  /echo 1 á\____/_____/_/á/_/áá\____/_/áááá/_/   (v3.7)(mIRC5.0)
  267. n265=  /echo 4 Script for mIRC5.0, ⌐1997 GLiTCH Studios
  268. n266=  /echo 6 Programmed by ]-[obbes
  269. n267=  /echo 6 Greetz to |{night, heXix, lagwagon, Chair, foofightr.
  270. n268=  /echo 6 Used  $+ %usage $+  times.
  271. n269=  /echo 3 E-mail suggestions and fixes to "glitchstudios@hotmail.com"
  272. n270=}
  273. n271=/saveini /save -a $mircdir $+ ini\alias.ini | /save -c $mircdir $+ ini\commands.ini | /save -e $mircdir $+ ini\events.ini | /save -u $mircdir $+ ini\users.ini | /save -v $mircdir $+ ini\variable.ini | /save -p $mircdir $+ ini\popups.ini
  274. n272=/beginmode {
  275. n273=  if (%splitdetector == Enabled) { .mode $me +is | window -l @Current_Split_Servers 100 100 250 250 c:\glitch\botfiles\splits.bot }
  276. n274=  else { .mode $me +i }
  277. n275=}
  278. n276=/setvars {
  279. n277=  inc %usage 1
  280. n278=  set %away.set no
  281. n279=  unset %messager*
  282. n280=  unset %msg*
  283. n281=  unset %action*
  284. n282=  unset %notice*
  285. n283=  unset %ping*
  286. n284=  unset %version*
  287. n285=  unset %trout*
  288. n286=  unset %time*
  289. n287=  unset %clientinfo*
  290. n288=  unset %userinfo*
  291. n289=  unset %general*
  292. n290=  unset %echo*
  293. n291=  unset %action*
  294. n292=  unset %finger*
  295. n293=  unset %total.clone*
  296. n294=}
  297. n295=/auto.away {
  298. n296=  if (%auto-away == Enabled) {
  299. n297=    .disable #auto.away
  300. n298=    .timer986 0 %auto.away .enable #auto.away
  301. n299=  .timer987 0 %auto.away .away.check }
  302. n300=}
  303. n301=/realtime {
  304. n302=  set %realtime $remove($timestamp,[)
  305. n303=  set %realtime $remove(%realtime,])
  306. n304=  if ($token(1,58,%realtime) == 12) {
  307. n305=    set %realtime.hour $token(1,58,%realtime) 
  308. n306=    set %realtime.minute $token(2,58,%realtime)
  309. n307=    %realtime.real = %realtime.hour $+ : $+ %realtime.minute $+ pm
  310. n308=  return %realtime.real | unset %realtime* | halt }
  311. n309=  elseif ($token(1,58,%realtime) > 12) {
  312. n310=    set %realtime.hour $token(1,58,%realtime) 
  313. n311=    dec %realtime.hour 12
  314. n312=    set %realtime.minute $token(2,58,%realtime)
  315. n313=    %realtime.real = %realtime.hour $+ : $+ %realtime.minute $+ pm
  316. n314=  return %realtime.real | unset %realtime* | halt }
  317. n315=  if ($token(1,58,%realtime) < 12) {
  318. n316=    if ($token(1,58,%realtime) > 0) {
  319. n317=      set %realtime.hour $token(1,58,%realtime)
  320. n318=      set %realtime.minute $token(2,58,%realtime)
  321. n319=      %realtime.real = %realtime.hour $+ : $+ %realtime.minute $+ am
  322. n320=    return %realtime.real | unset %realtime* | halt }
  323. n321=    if ($token(1,58,%realtime) == 0) {
  324. n322=      set %realtime.hour 12
  325. n323=      set %realtime.minute $token(2,58,%realtime)
  326. n324=      %realtime.real = %realtime.hour $+ : $+ %realtime.minute $+ am
  327. n325=    return %realtime.real | unset %realtime* | halt }
  328. n326=  }
  329. n327=}
  330. n328=/search {
  331. n329=  .enable #search
  332. n330=  set %search.channel #
  333. n331=  set %search.found 0
  334. n332=  set %search.string *1
  335. n333=  window @Search_Results_For_ $+ %search.channel 100 100 450 300
  336. n334=  echo 4 @Search_Results_For_ $+ %search.channel ½(GLiTCH)╗ Search String : %search.string
  337. n335=  who #
  338. n336=}
  339. n337=/caps.checker {
  340. n338=  set %caps.checker.text $remove(*1,$chr(544) )
  341. n339=  set %caps.checker $len(%caps.checker.text)
  342. n340=  set %caps.checker.var 1
  343. n341=  :start
  344. n342=  set %caps.checker.letter $asc($mid(%caps.checker.var,1,%caps.checker.text) )
  345. n343=  if (%caps.checker.letter >= 65) && (%caps.checker.letter <= 90) { inc %caps.total }
  346. n344=  if (%caps.total == %total.caps) { unset %caps* | return true | halt }
  347. n345=  if (%caps.checker == %caps.checker.var) { unset %caps* | return false | halt }
  348. n346=  else { inc %caps.checker.var | goto start }
  349. n347=}
  350. n348=/op.capture {
  351. n349=  echo 4 ½(GLiTCH)╗ Scanning $active for IRCops.
  352. n350=  .enable #op.capture
  353. n351=  .set %capture 0
  354. n352=  .set %op.scan.chan #
  355. n353=  .who #
  356. n354=}
  357. n355=/startup { .play -c $me $mircdir $+ botfiles\start.bot 1 }
  358. n356=/channel.scan set %scan.channel # | .enable #channel.scan | set %scan.total.clones 0 | mode # b | who #
  359. n357=/show.settings {
  360. n358=  window @Current_Settings 100 100 630 170 $mircdir $+ botfiles\setting.bot
  361. n359=  echo 4 @Current_Settings ½(GLiTCH)╗ User Protection = 1 $+ %l5prot $+ 
  362. n360=  echo 4 @Current_Settings ½(GLiTCH)╗ Autoop = 1 $+ %autoop $+ 
  363. n361=  if ($usermode == $null) { echo 4 @Current_Settings ½(GLiTCH)╗ User Mode(s) = 1None }
  364. n362=  else { echo 4 @Current_Settings ½(GLiTCH)╗ User Mode(s) = 1 $+ $usermode $+  }
  365. n363=  echo 4 @Current_Settings ½(GLiTCH)╗ Split Detector = 1 $+ %splitdetector $+ 
  366. n364=  echo 4 @Current_Settings ½(GLiTCH)╗ X/W Passwords = 1 $+ %xpass $+ / $+ %wpass $+ 
  367. n365=  echo 4 @Current_Settings ½(GLiTCH)╗ CTCP Flood Protection = 1 $+ %flood $+  MaxCtcps =  $+ %total.ctcps $+ 
  368. n366=  echo 4 @Current_Settings ½(GLiTCH)╗ Caps Detector = 1 $+ %stat.caps $+  MaxCaps =  $+ %total.caps $+ 
  369. n367=  echo 4 @Current_Settings ½(GLiTCH)╗ Mass Deop/Kick Protecion = 1 $+ %mass.deop.stat $+  MaxDeops =  $+ %mass.deop.total $+  $+ / $+  $+ %mass.kick.stat $+  MaxKicks =  $+ %mass.kick.total $+ 
  370. n368=  echo 4 @Current_Settings ½(GLiTCH)╗  Channel Protections = 1ServerOp Protection =  $+ %serverop $+  $+ / $+ Channel Mode Protection =  $+ %modeprot $+  $+ / $+ NoOp =  $+ %noop $+ 
  371. n369=}
  372.